home *** CD-ROM | disk | FTP | other *** search
- object frmMain: TfrmMain
- Left = 277
- Top = 109
- Width = 681
- Height = 539
- Caption = 'SML Test Client'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- PixelsPerInch = 96
- TextHeight = 13
- object Label2: TLabel
- Left = 8
- Top = 35
- Width = 84
- Height = 13
- Caption = 'Template Source:'
- end
- object Label3: TLabel
- Left = 474
- Top = 34
- Width = 46
- Height = 13
- Caption = 'Variables:'
- end
- object Label1: TLabel
- Left = 10
- Top = 12
- Width = 32
- Height = 13
- Caption = 'Label1'
- end
- object memTemplate: TMemo
- Left = 8
- Top = 50
- Width = 456
- Height = 152
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Courier New'
- Font.Style = []
- ParentFont = False
- ScrollBars = ssBoth
- TabOrder = 0
- end
- object memVariables: TMemo
- Left = 473
- Top = 50
- Width = 188
- Height = 150
- TabOrder = 1
- WordWrap = False
- end
- object btnGetPage: TButton
- Left = 10
- Top = 210
- Width = 75
- Height = 25
- Caption = 'Get Page'
- TabOrder = 2
- OnClick = btnGetPageClick
- end
- object btnLoad: TButton
- Left = 185
- Top = 8
- Width = 99
- Height = 25
- Caption = 'Load from File'
- TabOrder = 3
- OnClick = btnLoadClick
- end
- object edtFilename: TEdit
- Left = 54
- Top = 9
- Width = 121
- Height = 21
- TabOrder = 4
- end
- object btnSave: TButton
- Left = 97
- Top = 210
- Width = 75
- Height = 25
- Caption = 'Save'
- TabOrder = 5
- OnClick = btnSaveClick
- end
- object Panel1: TPanel
- Left = 8
- Top = 245
- Width = 655
- Height = 261
- BevelWidth = 2
- Caption = 'Panel1'
- TabOrder = 6
- object memSource: TMemo
- Left = 2
- Top = 2
- Width = 651
- Height = 257
- Align = alClient
- Lines.Strings = (
- 'memSource')
- ScrollBars = ssBoth
- TabOrder = 0
- end
- end
- object OpenDialog: TOpenDialog
- DefaultExt = 'SML'
- Filter =
- 'HTML files (*.html)|*.html|SML files (*.sml)|*.sml|All files (*.' +
- '*)|*.*'
- FilterIndex = 2
- InitialDir = '..\..\www\pages'
- Left = 80
- Top = 60
- end
- object SaveDialog: TSaveDialog
- DefaultExt = 'HTML'
- FileName = 'output.html'
- Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
- Left = 193
- Top = 209
- end
- end
-